﻿
Imports System.IO

Public Class head
    Inherits xhtmlControl

    Protected Overrides Function availableAttribute(ByVal key As String) As Boolean
#If CANNOT_DETERMINE Then
        Return attributesCollection.i18n(key) OrElse _
              strsame(key, "id") OrElse _
        strsame(key, "profile")
#Else
        Return attributesCollection.i18n(key) OrElse _
                strsame(key, "profile")
#End If
    End Function

    Public Sub New(Optional ByVal buff As Stream = Nothing)
        MyBase.New(buff, "head")
    End Sub

End Class
